* xmenu.c (syms_of_xmenu): Make accelerate-menu an alias for

 menu-bar-open.

diff --git a/src/ChangeLog b/src/ChangeLog
index 9bf2f6cda904c3148153aa84fd200f9a0ccaa6a6..6d4b233ebf919553571a9ad710ae42f059824a6e 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2006-06-01  Jan Dj\e,Ad\e(Brv  <jan.h.d@swipnet.se>
+
+       * xmenu.c (syms_of_xmenu): Make accelerate-menu an alias for
+       menu-bar-open.
+
 2006-06-01  Jan Dj\e,Ad\e(Brv  <jan.h.d@swipnet.se>
 
        * xmenu.c (Fmenu_bar_open, syms_of_xmenu): Change menu-bar-start to

diff --git a/src/xmenu.c b/src/xmenu.c
index f2b5f9f0c07a0aeb3a2b68b054dec1ae00fcd0b0..5a71d82a424e54955d89e9e66d5069a047393f91 100644 (file)
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -3772,6 +3772,8 @@ The enable predicate for a menu command should check this variable.  */);
 
 #if defined (USE_GTK) || defined (USE_X_TOOLKIT)
   defsubr (&Smenu_bar_open);
+  Fdefalias (intern ("accelerate-menu"), intern (Smenu_bar_open.symbol_name),
+             Qnil);
 #endif
 
 #ifdef HAVE_MENUS